home *** CD-ROM | disk | FTP | other *** search
-
-
-
- ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF)))) ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- ssssccccffffffffttttmmmm1111dddduuuu,,,, ddddzzzzffffffffttttmmmm1111dddduuuu ---- Multiple 1D, Real to Complex, Direct Fast Fourier
- Transforms.
-
- SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
- _F_o_r_t_r_a_n :
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssccccffffffffttttmmmm1111dddduuuu(((( ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, aaaarrrrrrrraaaayyyy,,,, iiiinnnncccc,,,, llllddddaaaa,,,, ccccooooeeeeffff ))))
- iiiinnnntttteeeeggggeeeerrrr ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, iiiinnnncccc,,,, llllddddaaaa
- rrrreeeeaaaallll aaaarrrrrrrraaaayyyy((((llllddddaaaa,,,,pppp)))),,,, ccccooooeeeeffff((((nnnn++++11115555))))
-
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ddddzzzzffffffffttttmmmm1111dddduuuu(((( ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, aaaarrrrrrrraaaayyyy,,,, iiiinnnncccc,,,, llllddddaaaa,,,, ccccooooeeeeffff ))))
- iiiinnnntttteeeeggggeeeerrrr ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, iiiinnnncccc,,,, llllddddaaaa
- rrrreeeeaaaallll****8888 aaaarrrrrrrraaaayyyy((((llllddddaaaa,,,,pppp)))),,,, ccccooooeeeeffff((((nnnn++++11115555))))
-
-
- _C :
- ####iiiinnnncccclllluuuuddddeeee <<<<fffffffftttt....hhhh>>>>
- iiiinnnntttt ssssccccffffffffttttmmmm1111dddduuuu (((( iiiinnnntttt ssssiiiiggggnnnn,,,, iiiinnnntttt nnnn,,,, iiiinnnntttt pppp,,,, ffffllllooooaaaatttt ****aaaarrrrrrrraaaayyyy,,,,
- iiiinnnntttt iiiinnnncccc,,,, iiiinnnntttt llllddddaaaa,,,, ffffllllooooaaaatttt ****ccccooooeeeeffff))));;;;
- iiiinnnntttt ddddzzzzffffffffttttmmmm1111dddduuuu (((( iiiinnnntttt ssssiiiiggggnnnn,,,, iiiinnnntttt nnnn,,,, iiiinnnntttt pppp,,,, ddddoooouuuubbbblllleeee ****aaaarrrrrrrraaaayyyy,,,,
- iiiinnnntttt iiiinnnncccc,,,, iiiinnnntttt llllddddaaaa,,,, ddddoooouuuubbbblllleeee ****ccccooooeeeeffff))));;;;
-
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- ssssccccffffffffttttmmmm1111dddduuuu and ddddzzzzffffffffttttmmmm1111dddduuuu compute the complex Fourier transform of P real
- sequences of N samples each. The k-th index F(k) of the Transform of an N
- sample sequence f(i) is equal to:
- F(k) = Sum ( W^(i*k) * f(i) ), for i =0, ..., (N-1)
- W = exp( (Sign*2*sqrt(-1)*PI) / N )
-
-
- The Fourier transforms are computed in-place so the input sequence is
- overwritten by the Fourier transform output. As the input sequences have
- real values, only half of the results are computed since the (N-k)-th
- sample of the transform would be the conjugate of the k-th sample.
-
- However, some extra space is necessary. For an N sample input sequence,
- the complex output of the transform takes ((N+2)/2) complex values. This
- represents either N+1(odd case) or N+2(even case) real values, that's one
- or two more real values than the input.
-
-
- PPPPAAAARRRRAAAAMMMMEEEETTTTEEEERRRRSSSS
- SSSSIIIIGGGGNNNN Integer specifying which sign to be used for the expression of W
- (see above) - must be either +1 or -1. Unchanged on exit.
-
- NNNN Integer, the number of samples in each sequence. Unchanged on exit.
-
- PPPP Integer, the number of sequences. Unchanged on exit.
-
-
-
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-
-
-
- ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF)))) ssssccccffffffffttttmmmm1111dddduuuu,,,,ddddzzzzffffffffttttmmmm1111dddduuuu((((3333FFFF))))
-
-
-
- AAAARRRRRRRRAAAAYYYY Array containing the samples of the sequence to be transformed.
- On input, the element "i" of the sequence "j" is stored as A(i*inc,j) in
- _F_o_r_t_r_a_n , and A[i*inc+j*lda] in _C.
- On exit, the array is overwritten by its transform.
-
- IIIINNNNCCCC Integer, increment between two consecutive elements of a sequence.
- Unchanged on exit.
-
- LLLLDDDDAAAA Integer, leading dimension: increment between the first samples of
- two consecutive sequences. Unchanged on exit.
-
- CCCCOOOOEEEEFFFFFFFF Array of at least ( N + 15 ) elements. On entry it contains the
- Sines/Cosines and factorization of N. COEFF needs to be initialized with
- a call to scfftm1dui or dzfftm1dui. Unchanged on exit.
-
-
- EEEExxxxaaaammmmpppplllleeee ooooffff CCCCaaaalllllllliiiinnnngggg SSSSeeeeqqqquuuueeeennnncccceeee
- 1D FFTs computed on 64 sequences of 1024 real values each. The elements
- of each sequence are stored with increment (stride) 1, and the offset
- between the first element of two succesive sequence (leading dimension)
- is 1026.
- Note : 1026 >= 1024+2 .
- _F_o_r_t_r_a_n
- real array(0:1026-1,0:64-1), coeff(1024+15)
- call scfftm1dui( 1024, coeff)
- call scfftm1du( -1, 1024, 64, array, 1, 1026, coeff)
-
- _C
- #include <fft.h>
- float array[64*1026], *coeff;
- coeff = scfftm1dui( 1024, NULL);
- scfftm1du( -1, 1024, 64, array, 1, 1026, coeff);
-
- SSSSEEEEEEEE AAAALLLLSSSSOOOO
- fft, scfftm1dui, dzfftm1dui, scfft1du, dzfft1du, csfftm1du, zdfftm1du
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 2222
-
-
-
-